-- background: 3837 from stack: in.0
-- bmap block id: 10061
-- flags: 4000
-- background id: 0
-- name: XFCNs
----- HyperTalk script -----
on opencard
  put (the number of this card - the number of first card of this background+1) into field "PageNumber"
end opencard



-- part 1 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=228 top=306 right=331 bottom=255
-- title width / last selected line: 0
-- icon id / first selected line: 1014 / 1014
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  visual effect wipe right
  go to previous card
end mouseUp



-- part 2 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=280 top=306 right=331 bottom=307
-- title width / last selected line: 0
-- icon id / first selected line: 1013 / 1013
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  visual effect wipe left
  go to next card
end mouseUp



-- part 5 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=57 top=23 right=57 bottom=340
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 2
-- text size: 24
-- style flags: 0
-- line height: 32
-- part name: Name


-- part 6 (field)
-- low flags: 00
-- high flags: 4007
-- rect: left=54 top=69 right=299 bottom=309
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 
----- HyperTalk script -----
on mousewithin
  if the OptionKey is down then
    if the locktext of the target is true then
      put true into DidUnlock
      set locktext of target to false
    else
      put false into DidUnlock
    end if
    set the cursor to 2
    repeat while (the OptionKey is down) and (item 1 of the rect of target <= item 1 of the mouseLoc) and (item 1 of the mouseLoc <= item 3 of the rect of target) and (item 2 of the rect of target <= item 2 of the mouseLoc) and (item 2 of the mouseLoc <= item 4 of the rect of target)
      if the Mouse is down then
        click at the MouseLoc
        click at the ClickLoc
        if the selection <> empty then
          visual dissolve to gray
          visual dissolve
          go card selection
        end if
      end if
    end repeat
    if DidUnlock then
      set the locktext of the target to true
    end if
  end if
end mousewithin



-- part 7 (field)
-- low flags: 00
-- high flags: 0007
-- rect: left=311 top=69 right=299 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 


-- part 9 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=332 top=306 right=326 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Resource Mover
----- HyperTalk script -----
on mouseUp
  ResCopy
end mouseUp



-- part 10 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=255 top=311 right=327 bottom=282
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: PageNumber


-- part 13 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=456 top=301 right=329 bottom=493
-- title width / last selected line: 0
-- icon id / first selected line: 11645 / 11645
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  visual effect iris close
  go first card
end mouseUp



-- part 20 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=2 top=74 right=117 bottom=49
-- title width / last selected line: 0
-- icon id / first selected line: 14767 / 14767
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: About...
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  visual iris open to gray
  visual iris close to black
  visual iris open to gray
  visual iris close
  go background information
end mouseUp



-- part 21 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=2 top=119 right=162 bottom=49
-- title width / last selected line: 0
-- icon id / first selected line: 29114 / 29114
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Back
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  visual barn door close to black
  visual barn door open
  go back
end mouseUp



-- part 22 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=2 top=164 right=207 bottom=49
-- title width / last selected line: 0
-- icon id / first selected line: 1011 / 1011
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  go home
end mouseUp



-- part 23 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=2 top=209 right=252 bottom=49
-- title width / last selected line: 0
-- icon id / first selected line: 1000 / 1000
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Open Stack
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  domenu "open stack..."
end mouseUp



-- part 24 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=2 top=254 right=297 bottom=49
-- title width / last selected line: 0
-- icon id / first selected line: 17343 / 17343
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Launch Application
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  visual venetian blinds to gray
  visual venetian blinds to black
  visual venetian blinds to gray
  visual venetian blinds

  go to background "Mini HyperStation"

end mouseUp



-- part 25 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=2 top=299 right=342 bottom=49
-- title width / last selected line: 0
-- icon id / first selected line: 21786 / 21786
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Menus Off
----- HyperTalk script -----
on mouseUp
  if the optionkey is down then
    pass mouseup
  end if

  If the short name of the target is "Menus On" then
    set the name of the target to "Menus Off"
    show menubar
  else
    set the name of the target to "Menus On"
    hide menubar
  end if
end mouseUp